#Include "Protheus.ch"

User Function TstWsCadTol()

Local oWs  := WsToledoCadastroItem():New()
Local lRet := .F.

oWs:oWsItem:cCodigo            := "312500"
oWs:oWsItem:cDescricao         := "Q. MONTANHES AVIACAO 1x2"
oWs:oWsItem:cTipo              := "1194"
oWs:oWsItem:cUnidadeControle   := "KG"
oWs:oWsItem:cEAN13             := "7896331100280"
oWs:oWsItem:cEAN14             := "17896331110316"
oWs:oWsItem:nToleranciaMinima  := 5.27
oWs:oWsItem:nToleranciaMaxima  := 7.27
oWs:oWsItem:nPesoMedioSugerido := 6.27
oWs:oWsItem:nPesoMedioEfetivo  := 6.27
oWs:oWsItem:nPesoBrutoEstimado := 0
oWs:oWsItem:nValidade1         := 180
oWs:oWsItem:cFaixaUnidadePeso  := "1222"

lRet := oWs:IncluiItem()

/*
Local oWs := WsImportaOrdem():New()

oWs:oWsOrdem := WsClassNew("ImportaOrdem_TTolOrdem")

oWs:oWsOrdem:oWsCabecalho := WsClassNew("ImportaOrdem_TTolCabec")
oWs:oWsOrdem:oWsCabecalho:cLote := "20619LJ0"
oWs:oWsOrdem:oWsCabecalho:cNumero := "123123"

oWs:oWsOrdem:oWsCabecalho:oWsCliente := WsClassNew("ImportaOrdem_TTolCliente")
oWs:oWsOrdem:oWsCabecalho:oWsCliente:cNome := "GONCALVES SALLES S/A"
oWs:oWsOrdem:oWsCabecalho:oWsCliente:cEndereco := "AV. WENCESLAU BRAZ, 36"
oWs:oWsOrdem:oWsCabecalho:oWsCliente:cCidade := "SAO SEBASTIAO DO PARAISO"
oWs:oWsOrdem:oWsCabecalho:oWsCliente:cUf := "MG"

oWs:oWsOrdem:oWsLista := WsClassNew("ImportaOrdem_ArrayOfTTolLista")

oWs:oWsOrdem:oWsLista:oWsTTolLista := {}

AAdd(oWs:oWsOrdem:oWsLista:oWsTTolLista, WsClassNew("ImportaOrdem_TTolLista"))
oWs:oWsOrdem:oWsLista:oWsTTolLista[1]:cItem      := "311000"
oWs:oWsOrdem:oWsLista:oWsTTolLista[1]:nQtdFormas := 10
oWs:oWsOrdem:oWsLista:oWsTTolLista[1]:nSequencia := 1

AAdd(oWs:oWsOrdem:oWsLista:oWsTTolLista, WsClassNew("ImportaOrdem_TTolLista"))
oWs:oWsOrdem:oWsLista:oWsTTolLista[2]:cItem      := "320200"
oWs:oWsOrdem:oWsLista:oWsTTolLista[2]:nQtdFormas := 10
oWs:oWsOrdem:oWsLista:oWsTTolLista[2]:nSequencia := 2

AAdd(oWs:oWsOrdem:oWsLista:oWsTTolLista, WsClassNew("ImportaOrdem_TTolLista"))
oWs:oWsOrdem:oWsLista:oWsTTolLista[3]:cItem      := "326500"
oWs:oWsOrdem:oWsLista:oWsTTolLista[3]:nQtdFormas := 10
oWs:oWsOrdem:oWsLista:oWsTTolLista[3]:nSequencia := 3

AAdd(oWs:oWsOrdem:oWsLista:oWsTTolLista, WsClassNew("ImportaOrdem_TTolLista"))
oWs:oWsOrdem:oWsLista:oWsTTolLista[4]:cItem      := "327000"
oWs:oWsOrdem:oWsLista:oWsTTolLista[4]:nQtdFormas := 10
oWs:oWsOrdem:oWsLista:oWsTTolLista[4]:nSequencia := 4

oWs:IncluiOrdem()
*/

Alert("FIM: ")

Return Nil